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•  Learn  more  Trigger  concepts— 

•  Create  additional  database  triggers 

•  Explain  the  rules  governing  triggers 

•  Implement  t r i ggjS^ 
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Creating  Triggers  on  System  Events 


CREATE   [OR  REPLACE]   TRIGGER  trigger _name 
timing 

[  da  tabase_even tl 
[OR  database_event2  OR  . . . ] ] 
ON   {DATABASE  |  SCHEMA} 
trigger  body 
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Log  On  and  Log  Off  Trigger  Example 


SQL>  CREATE  OR  REPLACE  TRIGGER  LOGON_TRIG 

2  AFTER  logon     ON  SCHEMA 

3  BEGIN 

4  INSERT  INTO  log_trig_table 

5  (user_id,  log_date,  action) 

6  VALUES   (user,   sysdate,    'Logging  on'); 

7  END ; 

 ~7  ^ — 7  ^  ^  /  ^  IV  \         _i  \ — ^  V\    /  \  


SQL>  CREATE  OR  REPLACE  TRIGGER  LOGOFF_TRIG 

2  BEFORE  logoff     ON  SCHEMA 

3  BEGIN 

4  INSERT  INTO  log_trig_table 

5  (user_id,  log_date,  action) 

6  VALUES   (user,   sysdate,    'Logging  off); 

7  END ; 
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CREATE   [OR  REPLACE]   TRIGGER  trlgger_name 
timing 

eventl   [OR  event2  OR  event3] 
ON  table_name 
[REFERENCING  OLD  AS  old  |   NEW  AS  new] 
[FOR  EACH  ROW] 

[WHEN  condition] 
CALL  procedure  name 


SQL>  CREATE  TRIGGER  TEST3 

2  BEFORE  INSERT  ON  EMP 

3  CALL  LOG_EXECUTION 

4  / 
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Reading  Data  from  a  Mutating  Table 


UPDATE  employees 

SET  salary  =  3400 

WHERE  last_name  =  smith'; 


EMPLQYEEStable 
EMPNO  ENAME 

7369  SMITH 
7698  BLAKE 
7788  SCOTT 


Failure 


C  H  EC  K_S  ALARY 
trigger 


JOB 

CLERK 
MANAGER 
ANALYST 


Trigged  table/ 
mutating  table 


SAL 


2850 
3000 


BEFORE 
UPDATE 
row 


|||  Trigger  event 
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CREATE  OR  REPLACE  TRIGGER  check_salary 
BEFORE  INSERT  OR  UPDATE  OF  salary,  job_id 
ON  employees 
FOR  EACH  ROW 

WHEN  (NEW.jobJd  <>  'AD_PRES') 
DECLARE 

v_minsalary  employees.salary%TYPE; 

v_maxsalary  employees.salary%TYPE; 
BEGIN 

SELECT  MIN(salary),  MAX(salary) 

INTO  v_minsalary,  v_maxsalary 

FROM  employees 

WHERE  job_id  =  :NEW.job_id; 

IF    :NEW.salary  <  v_minsalary  OR 

:NEW.salary  >  v_maxsalary  THEN 

RAISE_APPLICATION_ERROR(-20505,,Out  of  range1); 
END  IF; 
END: 
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Mutating  Table:  Example 


UPDATE  employees 

SET  salary  =  3400 

WHERE  last_name  =  'Stiles'; 

★ 

ERROR  at  line  2 : 

ORA-04091:   table  EMPLOYEES  is  mutating, 
trigger/function  may  not  see  it 
ORA-06512:   at  "CHECK_SALARY" ,   line  5 
ORA-04088:  error  during  execution  of  trigger 
'CHECK  SALARY ' 
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Implementation  of  Triggers 


You  can  use  trigger  for: 
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Controlling  Security  Within  the  Server 


GRANT  SELECT,  INSERT,  UPDATE,  DELETE 

ON  employees 

TO  clerk;  --  database  role 

GRANT  clerk  TO  scott; 
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Controlling  Security  with  a  Database  Trigger 


CREATE  OR  REPLACE  TRIGGER  secure_emp 

BEFORE  INSERT  OR  UPDATE  OR  DELETE  ON  employees 

DECLARE 

v_dummy  VARCHAR2(1); 

BEGIN 

IF  (TO_CHAR  (SYSDATE,  'DY')  IN  ('SAT','SUN')) 
THEN 

RAISE_APPLICATION_ERROR  (-20506,'You  may  only 
change  data  during  normal  business  hours.'); 
END  IF; 

SELECT  COUNTO  INTO  v_dummy  FROM  holiday 

WHERE  holiday_date  =  TRUNC  (SYSDATE); 

IF  v  dummy  >  0  THEN 

RAISE_APPLICATION_ERROR(-20507, 
'You  may  not  change  data  on  a  holiday.'); 

END  IF; 
END; 
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Auditing  Using  the  Server  Facility 


AUDIT  INSERT,  UPDATE 

,  DELETE 

ON  departments 

BY  ACCESS 

WHENEVER  SUCCESSFUL; 

\ 


Oracle  will  store  the  audit  information  in  a  data 
dictionary  table. 
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Auditing  Using  a  Trigger 


CREATE  OR  REPLACE  TRIGGER  audit_emp_values 
AFTER  DELETE  OR  INSERT  OR  UPDATE  ON  employees 
FOR  EACH  ROW 
BEGIN 

IF  (audit_emp_package.g_reason  IS  NULL)  THEN 

RAISE_APPLICATION_ERROR  (-20059,  'Specify  a  reason 
for  the  data  operation  through  the  procedure  SET  REASON 
of  the  AUDIT_EMP_PACKAGE  before  proceeding.'); 

ELSE 

INSERT  INTO  audit_emp_table  (username,  timestamp,  id, 
old_last_name,  new_last_name,  old_title,  new_title, 
old_salary,  new  salary,  comments) 

VALUES  (USER,  SYSDATE,  :OLD.employee_id,  :OLD.Iast_name, 
:NEW.Iast_name,  :OLD.job_id,  :NEW.job_id,  :OLD.salary, 
:NEW.salary,  audit_emp_package.g_reason); 
END  IF; 
END; 
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Enforce  Data  Integrity  Within  the  Server 


ALTER  TABLE  employees  ADD 

CONSTRAINT  ck_salary  CHECK  (salary  >=  500); 
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Protect  Data  Integrity  with  a  Trigger 


CREATE  OR  REPLACE  TRIGGER  check_salary 
BEFORE  UPDATE  OF  salary  ON  employees 
FOR  EACH  ROW 

WHEN  (NEW.salary  <  OLD.salary) 
BEGIN 

RAISE_APPLICATION_ERROR  (-20508, 
'Do  not  decrease  salary.'); 

END; 

/ 
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Enforce  Referential  Integrity  Within  the  Server 


ALTER  TABLE  employees 
ADD  CONSTRAINT  emp_deptno_fk 
FOREIGN  KEY  (depaitmentjd) 
REFERENCES  departments(department_id) 
ON  DELETE  CASCADE; 
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Protect  Referential  Integrity  with  a  Trigger 


CREATE  OR  REPLACE  TRIGGER  cascade_updates 
AFTER  UPDATE  OF  department_id  ON  departments 
FOR  EACH  ROW 
BEGIN 

UPDATE  employees 

SET  employees. department_id=:NEW.department_id 
WHERE  employees. department_id=:OLD.department_id; 
UPDATE  job_history 

SET  department_id=:NEW.department_id 
WHERE  department_id=:OLD.department_id; 
END; 
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Trigger  Information 


You  can  view  the  following  trigger  i 


USER_OBJECTS  data  dictionary  view:  object 
information 

USER_TRIGGERS  data  dictionary  view:  the  text 
of  the  trigger 

USER_ERRORS  data  dictionary  view:  PL/ SQL 
syntax  errors  (compilation  errors)  of  the  trigger 
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Benefits  of  Database  Triggers 


•Improved  data  security: 

Provide  value-based  security  checks 
-  Provide  value-based  auditing       "  "\ 
•Improved  data  integrity:  x^<^^^^^ 
Enforce  dynamic  data  integrity 
constraints     /  /p^v~5^ 
Enforce  complex  referential  integrity 
constraints  /   ^    L       \    ^^^^  ^ 
Ensure  related  operations  are 
performed  together  implicitly 
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Summary 


Use  advanced  database  triggers  -^^^^^ 
List  mutating  and  constraining  rules  for  triggers 
Describe  the  real-world  application  of  triggers 

•  Au(^^pg^\  J^AQCCS^^^ 
» Protecting  Referential  Integrity 
» Enforcing  Data  Integrity 

•  Computing  Derived 

Manage  triggers  p^T/\ 
View  trigger  information 
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Thank  You  ! 
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